/* Exercise 6.4 Message test    */
/* Created David Miles April 2006 */
/* Updated Ben Rowland Febuary 2014 */

#include <xc.h>

// CONFIG1
#pragma config FOSC = HS        // Oscillator Selection (HS Oscillator, High-speed crystal/resonator connected between OSC1 and OSC2 pins)
#pragma config WDTE = OFF       // Watchdog Timer Enable (WDT disabled)
#pragma config PWRTE = OFF      // Power-up Timer Enable (PWRT disabled)
#pragma config MCLRE = ON       // MCLR Pin Function Select (MCLR/VPP pin function is MCLR)
#pragma config CP = OFF         // Flash Program Memory Code Protection (Program memory code protection is disabled)
#pragma config CPD = OFF        // Data Memory Code Protection (Data memory code protection is disabled)
#pragma config BOREN = ON       // Brown-out Reset Enable (Brown-out Reset enabled)
#pragma config CLKOUTEN = OFF   // Clock Out Enable (CLKOUT function is disabled. I/O or oscillator function on the CLKOUT pin)
#pragma config IESO = OFF       // Internal/External Switchover (Internal/External Switchover mode is disabled)
#pragma config FCMEN = OFF      // Fail-Safe Clock Monitor Enable (Fail-Safe Clock Monitor is disabled)

// CONFIG2
#pragma config WRT = OFF        // Flash Memory Self-Write Protection (Write protection off)
#pragma config VCAPEN = OFF     // Voltage Regulator Capacitor Enable (All VCAP pin functionality is disabled)
#pragma config PLLEN = OFF      // PLL Enable (4x PLL disabled)
#pragma config STVREN = ON      // Stack Overflow/Underflow Reset Enable (Stack Overflow or Underflow will cause a Reset)
#pragma config BORV = LO        // Brown-out Reset Voltage Selection (Brown-out Reset Voltage (Vbor), low trip point selected.)
#pragma config LVP = OFF        // Low-Voltage Programming Enable (High-voltage on MCLR/VPP must be used for programming)

#define _XTAL_FREQ 19660800	// Defines the hardware crystal frequency allowing the delay function to work correctly

#define SPEED 400               // Used to trim the delay loops

#include "lcdlib.h"

const unsigned char messages [] =
{
    'n','o','*',
    'y','e','s','*',
    'p','r','o','b','a','b','l','y','*',
    'n','e','v','e','r','*',
    'n','o','t',' ','l','i','k','e','l','y','*',
    'n','o','t',' ','t','o','d','a','y','*',
    'u','n','c','l','e','a','r','*',
    'd','o','n','t',' ','b','e','t',' ','o','n',' ','i','t','*',
    'p','e','r','h','a','p','s','*',
    'o','u','t','l','o','o','k',' ','h','a','z','y','*',
    'a','s','k',' ','a','g','a','i','n','*',
    'i','t',' ','d','e','p','e','n','d','s','*',
    0x00
};


//#define DEBUG

void show_message ( unsigned char number )
{
    int pos = 0 ;

    while (number > 0)                      //find the start of the message
    {
        #ifdef DEBUG
          lcd_print_ch ( messages [pos] ) ;
        #endif

        if (messages [pos] == '*')
        {
            number = number - 1 ;
        }
        pos = pos + 1 ;                     //This is the line which is missing in the previous version
    }

    while ( messages [pos] != '*' )         //print the message
    {
        lcd_print_ch ( messages [pos] ) ;
        pos = pos + 1 ;
    }
}


//counts the messages in the message string, returns the result as a an integer
unsigned char count_messages ( void )
{
    unsigned char i, count = 0 ;

    for (i = 0; messages[i] != 0; i = i + 1 )
    {
        if (messages[i] == '*')
        {
            count = count + 1;
        }
    }
    return count;
}


void big_delay ( int size )
{
    int i, j ;
    for (i = 0; i < size; i = i + 1 )
    {
        for (j = 0; j < SPEED; j = j + 1);
    }
}


int main (void)
{
    unsigned char i, lim;
    
    ANSELB = 0x00;              //Put PORTB into Digital mode, defaults to analogue
    OPTION_REG = 0xC0;

    lcd_start ();

    lim = count_messages () ;

    for (i = 0; i < lim; i = i + 1)
    {
        show_message (i);
        big_delay (700);
        lcd_clear ();
    }

    while (1)                   //Loop forever
    {
    }

    return 0;
}